home *** CD-ROM | disk | FTP | other *** search
- #include "ScrollBar.h"
-
- void CalcScrollBounds(WindowPtr wp, Rect *cBounds)
- {
- *cBounds = wp->portRect;
- cBounds->top -= 1;
- cBounds->right += 1;
- cBounds->left = cBounds->right - 16;
- cBounds->bottom -= 14;
- }
-
- ControlHandle NewVScrollBar(WindowPtr wp)
- {
- GrafPtr savePort;
- ControlHandle cHandle;
- Rect cBounds;
-
- GetPort(&savePort);
- SetPort(wp);
-
- CalcScrollBounds(wp, &cBounds);
-
- cHandle = NewControl( wp, &cBounds, "\pVGrooviScroller",
- true, 1, 1, 1,
- scrollBarProc, (long)wp);
-
-
- SetPort(savePort);
-
- return cHandle;
- }
-
- void SizeVScrollBar(ControlHandle scroll, WindowPtr wp)
- {
- GrafPtr savePort;
- ControlHandle cHandle;
- Rect cBounds;
-
- GetPort(&savePort);
- SetPort(wp);
-
- CalcScrollBounds(wp, &cBounds);
-
- HideControl(scroll);
- (**scroll).contrlRect = cBounds;
- ShowControl(scroll);
-
- SetPort(savePort);
- }